A1 = readmatrix('NiI2_CPGE_LD_Pol_30K.csv')

x = A1(4:94,1)*2-12
y = abs(A1(4:94,2))
z = A1(4:94,3)

data = cat(2,x,y,z)
writematrix(data,['LD_Domain_1_after.txt'])

set(gcf,'Position',[0, 0, 200, 200])